|
AutoCAD VBA : Autocad 2011, Code zum Dateiöffnen funktioniert nicht
steven-66 am 17.02.2012 um 12:25 Uhr (0)
Hallo,ich bin vor kurzem von AutoCAD 2009 auf AutoCAD 2011 umgestiegen.Ich habe ein VBA-Makro, welches Geometrie in eine Datei speichert, diese dannöffnet, einige Anpassungen vornimmt und die Datei als im DXF-Format abspeichert.Dieser Code dient zum öffnen der Datei: ThisDrawing.Application.Documents.Open Dateinameund genau an dieser Stelle bricht das Makro ab.Kann mir hier jemand einen Tip geben, wieso der Code in AutoCAD 2011nicht mehr funktioniert?Leider gibt es in AutoCAD 2011 ja auch keine Hilfe für ...
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Autocad 2011, Code zum Dateiöffnen funktioniert nicht
steven-66 am 17.02.2012 um 13:21 Uhr (0)
Hallo runkeruebe,ja Du hast recht. Mit dem Codeschnipsel ist das Problem wohl nicht zu erkären/beheben.Der Gesamtcode soll eine ausgewählter Geometrie aus einer DWG in eine neue Zeichnung speichern,in diese Zeichnung die Positionsnummer reinschreiben, den erzeugten Text sprengen, ein Flatten Objects ausführen,die Datei dann als DXF-Datei speichern und die DWG-Datei dann löschen.Hier mal der Code (der so schon Jahrelang in AutoCAD 2009 funktioniert):Private Sub btnWBlock_Click()Positionstext einfügen Dim t ...
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Autocad 2011, Code zum Dateiöffnen funktioniert nicht
steven-66 am 17.02.2012 um 13:49 Uhr (0)
Problem gelöst!Sorry ich habe das Problem selbst lösen können.Früher hat VBA beim schreiben eines WBlocks die Dateiendung DWG automatischzum Dateinamen hinzugefügt. In AutoCAD 2011 wird die Endung nicht automatischhinzugefügt. Dadurch kann er die Datei nicht öffnen und bricht das Programm ab.Ich hab den Code so ergänzt: Dim Dateiname As String Dim DWGDatei As String Zielverzeichnis = Zielverzeichnis + "" Dateiname = Zielverzeichnis + Positionsnummer DWGDatei = Dateiname + ".dwg" Me.Hide ssetObj.Sele ...
| | In das Form AutoCAD VBA wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
